home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 November: Tool Chest / Dev.CD Nov 94.toast / Tool Chest / QuickDraw GX / QuickDraw GX Info / QuickDraw GX Interfaces / Interfaces & Libraries / Pascal Interfaces & Libraries / Pascal Interfaces / GraphicsRoutines.p < prev    next >
Encoding:
Text File  |  1994-04-02  |  35.1 KB  |  569 lines  |  [TEXT/MPS ]
  1. {
  2.  graphics:
  3.     public interface definition
  4.     by Cary Clark, Georgiann Delaney, Michael Fairman, Dave Good, Josh Horwich, Robert Johnson, Keith McGreggor, Oliver Steele, David Van Brink, Chris Yerga
  5.     Copyright 1987 - 1993 Apple Computer, Inc.  All rights reserved.
  6.  
  7.     Thanks to Bruce Leak for taking many mushy ideas and making them consistent and logical.
  8.     Thanks to Mike Reed for the Mathematica, Athens, conics, cubics and the tireless (but well-voiced) concerns.
  9.     Thanks to Bill Atkinson, Ernie Beernink for the inspiration and the well-trodden gxPath.
  10.     Thanks to Jerome Coonen for the permission to do this in the first place.
  11.     Thanks to Jim Batson and Gifford Calenda for not getting in the way.
  12.     Thanks to Sampo Kaasila for the vector proofs, rotated parabolas and the gxFont scaler.
  13.     Thanks to Scott Knaster, Will Stein, Jim Friedlander, Gene Pope, Laurie Girand and a host of others for
  14.         their unflagging support, without which this project would have been abandoned long ago.
  15.     Thanks to Andrew Singer and Michael Kahl for the speedy development environment.
  16.  
  17.     The sorting routine is originally from Knuth, coded in assembly by B. Atkinson and then in C by Galyn Susman.
  18.     The matrix routines and gxCurve walking routines were originally coded by Sampo Kaasila.
  19.     The gxPolygon and gxPath blitting edge walk was developed originally by Art Cabral.
  20.     The gxHalftone matrix was developed by Daniel I. Lipton.
  21.     The gxColor matching algorithms were developed by Robin Myers.
  22.     The code was developed in C (not C++) and assembly in THINK C 1.0, 2.0, 3.0, 4.0, and 5.0, and MPW 3.0, 3.1 and 3.2.
  23.  
  24. }
  25.  
  26. {$IFC UNDEFINED UsingIncludes}
  27. {$SETC UsingIncludes := 0}
  28. {$ENDC}
  29.  
  30. {$IFC NOT UsingIncludes}
  31.     UNIT GraphicsRoutines;
  32.     INTERFACE
  33. {$ENDC}
  34.  
  35. {$IFC UNDEFINED UsingGraphicsRoutines}
  36. {$SETC UsingGraphicsRoutines := 1}
  37.  
  38.  
  39. {$I+}
  40. {$SETC GraphicsRoutinesIncludes := UsingIncludes}
  41. {$SETC UsingIncludes := 1}
  42. {$IFC UNDEFINED UsingGraphicsTypes}
  43. {$I $$Shell(PInterfaces)GraphicsTypes.p}
  44. {$ENDC}
  45. {$IFC UNDEFINED UsingMathTypes}
  46. {$I $$Shell(PInterfaces)MathTypes.p}
  47. {$ENDC}
  48. {$IFC UNDEFINED UsingGraphicsErrors}
  49. {$I $$Shell(PInterfaces)GraphicsErrors.p}
  50. {$ENDC}
  51. {$IFC UNDEFINED UsingFontTypes}
  52. {$I $$Shell(PInterfaces)FontTypes.p}
  53. {$ENDC}
  54. {$IFC UNDEFINED UsingMemoryTypes}
  55. {$I $$Shell(PInterfaces)MemoryTypes.p}
  56. {$ENDC}
  57. {$SETC UsingIncludes := GraphicsRoutinesIncludes}
  58.  
  59.  
  60. FUNCTION GXCountGraphicsFunctions(graphicsFunction: ByteArray): LongInt; C;
  61. PROCEDURE GXInsertGraphicsFunction(graphicsFunction: ByteArray; index: LongInt; address: Ptr; identifier, reference: LongInt; device: GxViewDevice); C;
  62. FUNCTION GXGetGraphicsFunction(graphicsFunction: ByteArray; index: LongInt; VAR identifier, reference: LongInt; VAR device: GxViewDevice): Ptr; C;
  63. PROCEDURE GXSetGraphicsFunction(graphicsFunction: ByteArray; index: LongInt; address: Ptr; identifier, reference: LongInt; device: GxViewDevice); C;
  64. PROCEDURE GXRemoveGraphicsFunction(graphicsFunction: ByteArray; index: LongInt); C;
  65.  
  66. FUNCTION GXGetGraphicsFunctionAddress(graphicsFunction: ByteArray): Ptr; C;
  67.  
  68. FUNCTION GXGetGraphicsFunctionReference: LongInt; C;
  69. FUNCTION GXGetGraphicsFunctionDone(VAR result: LongInt): Boolean; C;
  70. PROCEDURE GXSetGraphicsFunctionDone(isDone, result: LongInt); C;
  71.  
  72. FUNCTION GXNewGraphicsClient(memoryStart: Ptr; memoryLength, separateStack: LongInt): GxGraphicsClient; C;
  73. FUNCTION GXGetGraphicsClient: GxGraphicsClient; C;
  74. PROCEDURE GXSetGraphicsClient(client: GxGraphicsClient); C;
  75. PROCEDURE GXDisposeGraphicsClient(client: GxGraphicsClient); C;
  76. FUNCTION GXGetGraphicsClientHeap(client: GxGraphicsClient): GxHeapPointer; C;
  77.  
  78. FUNCTION GXGetGraphicsClients(index, count: LongInt; VAR clients: GxGraphicsClient): LongInt; C;
  79. {returns the count }
  80.  
  81. PROCEDURE GXEnterGraphics; C;
  82. PROCEDURE GXExitGraphics; C;
  83.  
  84. FUNCTION GXGetGraphicsError(VAR stickyError: GxGraphicsError): GxGraphicsError; C;
  85. FUNCTION GXGetGraphicsNotice(VAR stickyNotice: GxGraphicsNotice): GxGraphicsNotice; C;
  86. FUNCTION GXGetGraphicsWarning(VAR stickyWarning: GxGraphicsWarning): GxGraphicsWarning; C;
  87. PROCEDURE GXPostGraphicsError(error: GxGraphicsError); C;
  88. PROCEDURE GXPostGraphicsNotice(notice: GxGraphicsNotice); C;
  89. PROCEDURE GXPostGraphicsWarning(warning: GxGraphicsWarning); C;
  90. FUNCTION GXGetUserGraphicsError(VAR reference: LongInt): GxUserErrorFunction; C;
  91. FUNCTION GXGetUserGraphicsNotice(VAR reference: LongInt): GxUserNoticeFunction; C;
  92. FUNCTION GXGetUserGraphicsWarning(VAR reference: LongInt): GxUserWarningFunction; C;
  93. PROCEDURE GXSetUserGraphicsError(userFunction: GxUserErrorFunction; reference: LongInt); C;
  94. PROCEDURE GXSetUserGraphicsNotice(userFunction: GxUserNoticeFunction; reference: LongInt); C;
  95. PROCEDURE GXSetUserGraphicsWarning(userFunction: GxUserWarningFunction; reference: LongInt); C;
  96.  
  97. PROCEDURE GXIgnoreGraphicsNotice(notice: GxGraphicsNotice); C;
  98. PROCEDURE GXPopGraphicsNotice; C;
  99. PROCEDURE GXIgnoreGraphicsWarning(warning: GxGraphicsWarning); C;
  100. PROCEDURE GXPopGraphicsWarning; C;
  101.  
  102. FUNCTION GXNewShapeVector(aType: GxShapeType; vector: FixedArray): GxShape; C;
  103. PROCEDURE GXSetShapeVector(target: GxShape; vector: FixedArray); C;
  104.  
  105. FUNCTION GXNewBitmap(data: GxBitmapPointer; position: GxPointPointer): GxShape; C;
  106. FUNCTION GXNewCurve(data: GxCurvePointer): GxShape; C;
  107. FUNCTION GXNewGlyphs(charCount: LongInt; text: ByteArray; positions: GxPointArray; advance: LongIntArray;
  108.         tangents: GxPointArray; styleRuns: IntegerArray; glyphStyles: GxStyleArray): GxShape; C;
  109. FUNCTION GXNewLine(data: GxLinePointer): GxShape; C;
  110. FUNCTION GXNewPaths(data: GxPathsPointer): GxShape; C;
  111. FUNCTION GXNewPicture(count: LongInt; shapes: GxShapeArray; styles: GxStyleArray; inks: GxInkArray; transforms: GxTransformArray): GxShape; C;
  112. FUNCTION GXNewPoint(data: GxPointPointer): GxShape; C;
  113. FUNCTION GXNewPolygons(data: GxPolygonsPointer): GxShape; C;
  114. FUNCTION GXNewRectangle(data: GxRectanglePointer): GxShape; C;
  115. FUNCTION GXNewText(charCount: LongInt; text: ByteArray; position: GxPointPointer): GxShape; C;
  116.  
  117. FUNCTION GXGetBitmap(source: GxShape; VAR data: GxBitmap; VAR position: GxPoint): GxBitmapPointer; C;
  118. FUNCTION GXGetCurve(source: GxShape; VAR data: GxCurve): GxCurvePointer; C;
  119. FUNCTION GXGetGlyphs(source: GxShape; VAR charCount: LongInt; VAR text: Byte; VAR positions: GxPoint; VAR advance: LongInt;
  120.         VAR tangents: GxPoint; VAR runCount: LongInt; VAR styleRuns: Integer; VAR glyphStyles: GxStyle): LongInt; C;
  121. FUNCTION GXGetLine(source: GxShape; VAR data: GxLine): GxLinePointer; C;
  122. FUNCTION GXGetPaths(source: GxShape; VAR data: GxPaths): LongInt; C;
  123. FUNCTION GXGetPicture(source: GxShape; VAR shapes: GxShape; VAR styles: GxStyle; VAR inks: GxInk; VAR transforms: GxTransform): LongInt; C;
  124. FUNCTION GXGetPoint(source: GxShape; VAR data: GxPoint): GxPointPointer; C;
  125. FUNCTION GXGetPolygons(source: GxShape; VAR data: GxPolygons): LongInt; C;
  126. FUNCTION GXGetRectangle(source: GxShape; VAR data: GxRectangle): GxRectanglePointer; C;
  127. FUNCTION GXGetText(source: GxShape; VAR charCount: LongInt; VAR text: Byte; VAR position: GxPoint): LongInt; C;
  128.  
  129. PROCEDURE GXSetBitmap(target: GxShape; data: GxBitmapPointer; position: GxPointPointer); C;
  130. PROCEDURE GXSetCurve(target: GxShape; data: GxCurvePointer); C;
  131. PROCEDURE GXSetGlyphs(target: GxShape; charCount: LongInt; text: ByteArray; positions: GxPointArray;
  132.         advance: LongIntArray; tangents: GxPointArray; styleRuns: IntegerArray; glyphStyles: GxStyleArray); C;
  133. PROCEDURE GXSetLine(target: GxShape; data: GxLinePointer); C;
  134. PROCEDURE GXSetPaths(target: GxShape; data: GxPathsPointer); C;
  135. PROCEDURE GXSetPicture(target: GxShape; count: LongInt; shapes: GxShapeArray; styles: GxStyleArray;
  136.         inks: GxInkArray; transforms: GxTransformArray); C;
  137. PROCEDURE GXSetPoint(target: GxShape; data: GxPointPointer); C;
  138. PROCEDURE GXSetPolygons(target: GxShape; data: GxPolygonsPointer); C;
  139. PROCEDURE GXSetRectangle(target: GxShape; data: GxRectanglePointer); C;
  140. PROCEDURE GXSetText(target: GxShape; charCount: LongInt; text: ByteArray; position: GxPointPointer); C;
  141.  
  142. PROCEDURE GXDrawBitmap(data: GxBitmapPointer; position: GxPointPointer); C;
  143. PROCEDURE GXDrawCurve(data: GxCurvePointer); C;
  144. PROCEDURE GXDrawGlyphs(charCount: LongInt; text: ByteArray; positions: GxPointArray; advance: LongIntArray;
  145.         tangents: GxPointArray; styleRuns: IntegerArray; glyphStyles: GxStyleArray); C;
  146. PROCEDURE GXDrawLine(data: GxLinePointer); C;
  147. PROCEDURE GXDrawPaths(data: GxPathsPointer; fill: GxShapeFill); C;
  148. PROCEDURE GXDrawPicture(count: LongInt; shapes: GxShapeArray; styles: GxStyleArray; inks: GxInkArray; transforms: GxTransformArray); C;
  149. PROCEDURE GXDrawPoint(data: GxPointPointer); C;
  150. PROCEDURE GXDrawPolygons(data: GxPolygonsPointer; fill: GxShapeFill); C;
  151. PROCEDURE GXDrawRectangle(data: GxRectanglePointer; fill: GxShapeFill); C;
  152. PROCEDURE GXDrawText(charCount: LongInt; text: ByteArray; position: GxPointPointer); C;
  153.  
  154. FUNCTION GXNewColorProfile(profile: GxProfilePointer; responses: GxProfileResponsePointer): GxColorProfile; C;
  155. FUNCTION GXNewColorSet(space: GxColorSpace; count: LongInt; colors: GxSetColorArray): GxColorSet; C;
  156. FUNCTION GXNewInk: GxInk; C;
  157. FUNCTION GXNewShape(aType: GxShapeType): GxShape; C;
  158. FUNCTION GXNewStyle: GxStyle; C;
  159. FUNCTION GXNewTag(tagType, length: LongInt; data: Ptr): GxTag; C;
  160. FUNCTION GXNewTransform: GxTransform; C;
  161. FUNCTION GXNewViewDevice(group: GxViewGroup; bitmapShape: GxShape): GxViewDevice; C;
  162. FUNCTION GXNewViewGroup: GxViewGroup; C;
  163. FUNCTION GXNewViewPort(group: GxViewGroup): GxViewPort; C;
  164.  
  165. PROCEDURE GXDisposeColorProfile(target: GxColorProfile); C;
  166. PROCEDURE GXDisposeColorSet(target: GxColorSet); C;
  167. PROCEDURE GXDisposeInk(target: GxInk); C;
  168. PROCEDURE GXDisposeShape(target: GxShape); C;
  169. PROCEDURE GXDisposeStyle(target: GxStyle); C;
  170. PROCEDURE GXDisposeTag(target: GxTag); C;
  171. PROCEDURE GXDisposeTransform(target: GxTransform); C;
  172. PROCEDURE GXDisposeViewDevice(target: GxViewDevice); C;
  173. PROCEDURE GXDisposeViewGroup(target: GxViewGroup); C;
  174. PROCEDURE GXDisposeViewPort(target: GxViewPort); C;
  175.  
  176. FUNCTION GXCloneColorProfile(source: GxColorProfile): GxColorProfile; C;
  177. FUNCTION GXCloneColorSet(source: GxColorSet): GxColorSet; C;
  178. FUNCTION GXCloneInk(source: GxInk): GxInk; C;
  179. FUNCTION GXCloneShape(source: GxShape): GxShape; C;
  180. FUNCTION GXCloneStyle(source: GxStyle): GxStyle; C;
  181. FUNCTION GXCloneTag(source: GxTag): GxTag; C;
  182. FUNCTION GXCloneTransform(source: GxTransform): GxTransform; C;
  183.  
  184. FUNCTION GXCopyToColorProfile(target, source: GxColorProfile): GxColorProfile; C;
  185. FUNCTION GXCopyToColorSet(target, source: GxColorSet): GxColorSet; C;
  186. FUNCTION GXCopyToInk(target, source: GxInk): GxInk; C;
  187. FUNCTION GXCopyToShape(target, source: GxShape): GxShape; C;
  188. FUNCTION GXCopyToStyle(target, source: GxStyle): GxStyle; C;
  189. FUNCTION GXCopyToTag(target, source: GxTag): GxTag; C;
  190. FUNCTION GXCopyToTransform(target, source: GxTransform): GxTransform; C;
  191. FUNCTION GXCopyToViewDevice(target, source: GxViewDevice): GxViewDevice; C;
  192. FUNCTION GXCopyToViewPort(target, source: GxViewPort): GxViewPort; C;
  193.  
  194. FUNCTION GXEqualColorProfile(one, two: GxColorProfile): Boolean; C;
  195. FUNCTION GXEqualColorSet(one, two: GxColorSet): Boolean; C;
  196. FUNCTION GXEqualInk(one, two: GxInk): Boolean; C;
  197. FUNCTION GXEqualShape(one, two: GxShape): Boolean; C;
  198. FUNCTION GXEqualStyle(one, two: GxStyle): Boolean; C;
  199. FUNCTION GXEqualTag(one, two: GxTag): Boolean; C;
  200. FUNCTION GXEqualTransform(one, two: GxTransform): Boolean; C;
  201. FUNCTION GXEqualViewDevice(one, two: GxViewDevice): Boolean; C;
  202. FUNCTION GXEqualViewPort(one, two: GxViewPort): Boolean; C;
  203.  
  204. PROCEDURE GXResetInk(target: GxInk); C;
  205. PROCEDURE GXResetShape(target: GxShape); C;
  206. PROCEDURE GXResetStyle(target: GxStyle); C;
  207. PROCEDURE GXResetTransform(target: GxTransform); C;
  208.  
  209. PROCEDURE GXLoadColorProfile(target: GxColorProfile); C;
  210. PROCEDURE GXLoadColorSet(target: GxColorSet); C;
  211. PROCEDURE GXLoadInk(target: GxInk); C;
  212. PROCEDURE GXLoadShape(target: GxShape); C;
  213. PROCEDURE GXLoadStyle(target: GxStyle); C;
  214. PROCEDURE GXLoadTag(target: GxTag); C;
  215. PROCEDURE GXLoadTransform(target: GxTransform); C;
  216.  
  217. PROCEDURE GXUnloadColorProfile(target: GxColorProfile); C;
  218. PROCEDURE GXUnloadColorSet(target: GxColorSet); C;
  219. PROCEDURE GXUnloadInk(target: GxInk); C;
  220. PROCEDURE GXUnloadShape(target: GxShape); C;
  221. PROCEDURE GXUnloadStyle(target: GxStyle); C;
  222. PROCEDURE GXUnloadTag(target: GxTag); C;
  223. PROCEDURE GXUnloadTransform(target: GxTransform); C;
  224.  
  225. PROCEDURE GXCacheShape(source: GxShape); C;
  226. FUNCTION GXCopyDeepToShape(target, source: GxShape): GxShape; C;
  227. PROCEDURE GXDrawShape(source: GxShape); C;
  228. PROCEDURE GXDisposeShapeCache(target: GxShape); C;
  229.  
  230. FUNCTION GXGetDefaultColorProfile: GxColorProfile; C;
  231. FUNCTION GXGetDefaultShape(aType: GxShapeType): GxShape; C;
  232. FUNCTION GXGetDefaultColorSet(pixelDepth: LongInt): GxColorSet; C;
  233.  
  234.  
  235. PROCEDURE GXSetDefaultShape(target: GxShape); C;
  236. PROCEDURE GXSetDefaultColorSet(target: GxColorSet; pixelDepth: LongInt); C;
  237.  
  238. FUNCTION GXGetTag(source: GxTag; VAR tagType: LongInt; data: Ptr): LongInt; C;
  239. PROCEDURE GXSetTag(target: GxTag; tagType, length: LongInt; data: Ptr); C;
  240.  
  241. FUNCTION GXGetShapeBounds(source: GxShape; index: LongInt; VAR bounds: GxRectangle): GxRectanglePointer; C;
  242. FUNCTION GXGetShapeFill(source: GxShape): GxShapeFill; C;
  243. FUNCTION GXGetShapeInk(source: GxShape): GxInk; C;
  244. FUNCTION GXGetShapePixel(source: GxShape; x, y: LongInt; VAR data: GxColor; VAR index: LongInt): LongInt; C;
  245. FUNCTION GXGetShapeStyle(source: GxShape): GxStyle; C;
  246. FUNCTION GXGetShapeTransform(source: GxShape): GxTransform; C;
  247. FUNCTION GXGetShapeType(source: GxShape): GxShapeType; C;
  248. FUNCTION GXGetShapeTypographicBounds(source: GxShape; VAR bounds: GxRectangle): GxRectanglePointer; C;
  249. FUNCTION GXGetBitmapParts(source: GxShape; bounds: GxLongRectanglePointer): GxShape; C;
  250. PROCEDURE GXGetStyleFontMetrics(sourceStyle: GxStyle; VAR before, after, caretAngle, caretOffset: GxPoint); C;
  251. PROCEDURE GXGetShapeFontMetrics(source: GxShape; VAR before, after, caretAngle, caretOffset: GxPoint); C;
  252.  
  253. PROCEDURE GXSetShapeBounds(target: GxShape; newBounds: GxRectanglePointer); C;
  254. PROCEDURE GXSetShapeFill(target: GxShape; newFill: GxShapeFill); C;
  255. PROCEDURE GXSetShapeInk(target: GxShape; newInk: GxInk); C;
  256. PROCEDURE GXSetShapePixel(target: GxShape; x, y: LongInt; newColor: GxColorPointer; newIndex: LongInt); C;
  257. PROCEDURE GXSetShapeStyle(target: GxShape; newStyle: GxStyle); C;
  258. PROCEDURE GXSetShapeTransform(target: GxShape; newTransform: GxTransform); C;
  259. PROCEDURE GXSetShapeType(target: GxShape; newType: GxShapeType); C;
  260. PROCEDURE GXSetBitmapParts(target: GxShape; bounds: GxLongRectanglePointer; bitmapShape: GxShape); C;
  261.  
  262. PROCEDURE GXSetShapeGeometry(target, geometry: GxShape); C;
  263.  
  264. FUNCTION GXGetShapeCurveError(source: GxShape): Fixed; C;
  265. FUNCTION GXGetShapeDash(source: GxShape; VAR dash: GxDashRecord): GxDashPointer; C;
  266. FUNCTION GXGetShapeCap(source: GxShape; VAR cap: GxCapRecord): GxCapPointer; C;
  267. FUNCTION GXGetShapeFace(source: GxShape; VAR face: GxTextFace): LongInt; C;    { returns the number of layers }
  268. FUNCTION GXGetShapeFont(source: GxShape): GxFont; C;
  269. FUNCTION GXGetShapeJoin(source: GxShape; VAR join: GxJoinRecord): GxJoinPointer; C;
  270. FUNCTION GXGetShapeJustification(source: GxShape): Fract; C;
  271. FUNCTION GXGetShapePattern(source: GxShape; VAR pattern: GxPatternRecord): GxPatternPointer; C;
  272. FUNCTION GXGetShapePen(source: GxShape): Fixed; C;
  273. FUNCTION GXGetShapeEncoding(source: GxShape; VAR script: GxFontScript; VAR language: GxFontLanguage): GxFontPlatform; C;
  274. FUNCTION GXGetShapeTextSize(source: GxShape): Fixed; C;
  275. FUNCTION GXGetShapeFontVariations(source: GxShape; VAR variations: GxFontVariation): LongInt; C;
  276. FUNCTION GXGetShapeFontVariationSuite(source: GxShape; VAR variations: GxFontVariation): LongInt; C;
  277.  
  278. FUNCTION GXGetStyleCurveError(source: GxStyle): Fixed; C;
  279. FUNCTION GXGetStyleDash(source: GxStyle; VAR dash: GxDashRecord): GxDashPointer; C;
  280. FUNCTION GXGetStyleCap(source: GxStyle; VAR cap: GxCapRecord): GxCapPointer; C;
  281. FUNCTION GXGetStyleFace(source: GxStyle; VAR face: GxTextFace): LongInt; C;        { returns the number of layers }
  282. FUNCTION GXGetStyleFont(source: GxStyle): GxFont; C;
  283. FUNCTION GXGetStyleJoin(source: GxStyle; VAR join: GxJoinRecord): GxJoinPointer; C;
  284. FUNCTION GXGetStyleJustification(source: GxStyle): Fract; C;
  285. FUNCTION GXGetStylePattern(source: GxStyle; VAR pattern: GxPatternRecord): GxPatternPointer; C;
  286. FUNCTION GXGetStylePen(source: GxStyle): Fixed; C;
  287. FUNCTION GXGetStyleEncoding(source: GxStyle; VAR script: GxFontScript; VAR language: GxFontLanguage): GxFontPlatform; C;
  288. FUNCTION GXGetStyleTextSize(source: GxStyle): Fixed; C;
  289. FUNCTION GXGetStyleFontVariations(source: GxStyle; VAR variations: GxFontVariation): LongInt; C;
  290. FUNCTION GXGetStyleFontVariationSuite(source: GxStyle; VAR variations: GxFontVariation): LongInt; C;
  291.  
  292. PROCEDURE GXSetShapeCurveError(target: GxShape; error: Fixed); C;
  293. PROCEDURE GXSetShapeDash(target: GxShape; dash: GxDashPointer); C;
  294. PROCEDURE GXSetShapeCap(target: GxShape; cap: GxCapPointer); C;
  295. PROCEDURE GXSetShapeFace(target: GxShape; face: GxTextFacePointer); C;
  296. PROCEDURE GXSetShapeFont(target: GxShape; aFont: GxFont); C;
  297. PROCEDURE GXSetShapeJoin(target: GxShape; join: GxJoinPointer); C;
  298. PROCEDURE GXSetShapeJustification(target: GxShape; justify: Fract); C;
  299. PROCEDURE GXSetShapePattern(target: GxShape; pattern: GxPatternPointer); C;
  300. PROCEDURE GXSetShapePen(target: GxShape; pen: Fixed); C;
  301. PROCEDURE GXSetShapeEncoding(target: GxShape; platform: GxFontPlatform; script: GxFontScript; language: GxFontLanguage); C;
  302. PROCEDURE GXSetShapeTextSize(target: GxShape; size: Fixed); C;
  303. PROCEDURE GXSetShapeFontVariations(target: GxShape; count: LongInt; variations: GxFontVariationArray); C;
  304.  
  305. PROCEDURE GXSetStyleCurveError(target: GxStyle; error: Fixed); C;
  306. PROCEDURE GXSetStyleDash(target: GxStyle; dash: GxDashPointer); C;
  307. PROCEDURE GXSetStyleCap(target: GxStyle; cap: GxCapPointer); C;
  308. PROCEDURE GXSetStyleFace(target: GxStyle; face: GxTextFacePointer); C;
  309. PROCEDURE GXSetStyleFont(target: GxStyle; aFont: GxFont); C;
  310. PROCEDURE GXSetStyleJoin(target: GxStyle; join: GxJoinPointer); C;
  311. PROCEDURE GXSetStyleJustification(target: GxStyle; justify: Fract); C;
  312. PROCEDURE GXSetStylePattern(target: GxStyle; pattern: GxPatternPointer); C;
  313. PROCEDURE GXSetStylePen(target: GxStyle; pen: Fixed); C;
  314. PROCEDURE GXSetStyleEncoding(target: GxStyle; platform: GxFontPlatform; script: GxFontScript; language: GxFontLanguage); C;
  315. PROCEDURE GXSetStyleTextSize(target: GxStyle; size: Fixed); C;
  316. PROCEDURE GXSetStyleFontVariations(target: GxStyle; count: LongInt; variations: GxFontVariationArray); C;
  317.  
  318. FUNCTION GXGetShapeColor(source: GxShape; VAR data: GxColor): GxColorPointer; C;
  319. FUNCTION GXGetShapeTransfer(source: GxShape; VAR data: GxTransferMode): GxTransferModePointer; C;
  320.  
  321. FUNCTION GXGetInkColor(source: GxInk; VAR data: GxColor): GxColorPointer; C;
  322. FUNCTION GXGetInkTransfer(source: GxInk; VAR data: GxTransferMode): GxTransferModePointer; C;
  323.  
  324. PROCEDURE GXSetShapeColor(target: GxShape; data: GxColorPointer); C;
  325. PROCEDURE GXSetShapeTransfer(target: GxShape; data: GxTransferModePointer); C;
  326.  
  327. PROCEDURE GXSetInkColor(target: GxInk; data: GxColorPointer); C;
  328. PROCEDURE GXSetInkTransfer(target: GxInk; data: GxTransferModePointer); C;
  329.  
  330. FUNCTION GXGetShapeClip(source: GxShape): GxShape; C;
  331. FUNCTION GXGetShapeMapping(source: GxShape; VAR map: GxMapping): GxMappingPointer; C;
  332. FUNCTION GXGetShapeHitTest(source: GxShape; VAR tolerance: Fixed): GxShapePart; C;
  333. FUNCTION GXGetShapeViewPorts(source: GxShape; VAR list: GxViewPort): LongInt; C;
  334.  
  335. FUNCTION GXGetTransformClip(source: GxTransform): GxShape; C;
  336. FUNCTION GXGetTransformMapping(source: GxTransform; VAR map: GxMapping): GxMappingPointer; C;
  337. FUNCTION GXGetTransformHitTest(source: GxTransform; VAR tolerance: Fixed): GxShapePart; C;
  338. FUNCTION GXGetTransformViewPorts(source: GxTransform; VAR list: GxViewPort): LongInt; C;
  339.  
  340. PROCEDURE GXSetShapeClip(target, clip: GxShape); C;
  341. PROCEDURE GXSetShapeMapping(target: GxShape; map: GxMappingPointer); C;
  342. PROCEDURE GXSetShapeHitTest(target: GxShape; mask: GxShapePart; tolerance: Fixed); C;
  343. PROCEDURE GXSetShapeViewPorts(target: GxShape; count: LongInt; list: GxViewPortArray); C;
  344.  
  345. PROCEDURE GXSetTransformClip(target: GxTransform; clip: GxShape); C;
  346. PROCEDURE GXSetTransformMapping(target: GxTransform; map: GxMappingPointer); C;
  347. PROCEDURE GXSetTransformHitTest(target: GxTransform; mask: GxShapePart; tolerance: Fixed); C;
  348. PROCEDURE GXSetTransformViewPorts(target: GxTransform; count: LongInt; list: GxViewPortArray); C;
  349.  
  350. FUNCTION GXGetColorSet(source: GxColorSet; VAR space: GxColorSpace; VAR colors: GxSetColor): LongInt; C;
  351. FUNCTION GXGetColorProfile(source: GxColorProfile; VAR profile: GxProfileRecord; VAR responses: GxProfileResponse): LongInt; C;
  352.  
  353. PROCEDURE GXSetColorSet(target: GxColorSet; space: GxColorSpace; count: LongInt; colors: GxSetColorArray); C;
  354. PROCEDURE GXSetColorProfile(target: GxColorProfile; profile: GxProfilePointer; responses: GxProfileResponsePointer); C;
  355.  
  356. FUNCTION GXGetViewDeviceBitmap(source: GxViewDevice): GxShape; C;
  357. FUNCTION GXGetViewDeviceClip(source: GxViewDevice): GxShape; C;
  358. FUNCTION GXGetViewDeviceMapping(source: GxViewDevice; VAR map: GxMapping): GxMappingPointer; C;
  359. FUNCTION GXGetViewDeviceViewGroup(source: GxViewDevice): GxViewGroup; C;
  360.  
  361. PROCEDURE GXSetViewDeviceBitmap(target: GxViewDevice; bitmapShape: GxShape); C;
  362. PROCEDURE GXSetViewDeviceClip(target: GxViewDevice; clip: GxShape); C;
  363. PROCEDURE GXSetViewDeviceMapping(target: GxViewDevice; map: GxMappingPointer); C;
  364. PROCEDURE GXSetViewDeviceViewGroup(target: GxViewDevice; group: GxViewGroup); C;
  365.  
  366. FUNCTION GXGetViewPortChildren(source: GxViewPort; VAR list: GxViewPort): LongInt; C;
  367. FUNCTION GXGetViewPortClip(source: GxViewPort): GxShape; C;
  368. FUNCTION GXGetViewPortDither(source: GxViewPort): LongInt; C;
  369. FUNCTION GXGetViewPortHalftone(source: GxViewPort; VAR data: GxHalftone): Boolean; C;
  370. FUNCTION GXGetViewPortMapping(source: GxViewPort; VAR map: GxMapping): GxMappingPointer; C;
  371. FUNCTION GXGetViewPortParent(source: GxViewPort): GxViewPort; C;
  372. FUNCTION GXGetViewPortViewGroup(source: GxViewPort): GxViewGroup; C;
  373.  
  374. PROCEDURE GXSetViewPortChildren(target: GxViewPort; count: LongInt; list: GxViewPortArray); C;
  375. PROCEDURE GXSetViewPortClip(target: GxViewPort; clip: GxShape); C;
  376. PROCEDURE GXSetViewPortDither(target: GxViewPort; level: LongInt); C;
  377. PROCEDURE GXSetViewPortHalftone(target: GxViewPort; data: GxHalftonePointer); C;
  378. PROCEDURE GXSetViewPortMapping(target: GxViewPort; map: GxMappingPointer); C;
  379. PROCEDURE GXSetViewPortParent(target, parent: GxViewPort); C;
  380. PROCEDURE GXSetViewPortViewGroup(target: GxViewPort; group: GxViewGroup); C;
  381.  
  382. FUNCTION GXGetColorProfileTags(source: GxColorProfile; tagType, index, count: LongInt; VAR items: GxTag): LongInt; C;
  383. FUNCTION GXGetColorSetTags(source: GxColorSet; tagType, index, count: LongInt; VAR items: GxTag): LongInt; C;
  384. FUNCTION GXGetInkTags(source: GxInk; tagType, index, count: LongInt; VAR items: GxTag): LongInt; C;
  385. FUNCTION GXGetShapeTags(source: GxShape; tagType, index, count: LongInt; VAR items: GxTag): LongInt; C;
  386. FUNCTION GXGetStyleTags(source: GxStyle; tagType, index, count: LongInt; VAR items: GxTag): LongInt; C;
  387. FUNCTION GXGetTransformTags(source: GxTransform; tagType, index, count: LongInt; VAR items: GxTag): LongInt; C;
  388. FUNCTION GXGetViewDeviceTags(source: GxViewDevice; tagType, index, count: LongInt; VAR items: GxTag): LongInt; C;
  389. FUNCTION GXGetViewPortTags(source: GxViewPort; tagType, index, count: LongInt; VAR items: GxTag): LongInt; C;
  390.  
  391. PROCEDURE GXSetColorProfileTags(target: GxColorProfile; tagType, index, oldCount, newCount: LongInt; items: GxTagArray); C;
  392. PROCEDURE GXSetColorSetTags(target: GxColorSet; tagType, index, oldCount, newCount: LongInt; items: GxTagArray); C;
  393. PROCEDURE GXSetInkTags(target: GxInk; tagType, index, oldCount, newCount: LongInt; items: GxTagArray); C;
  394. PROCEDURE GXSetShapeTags(target: GxShape; tagType, index, oldCount, newCount: LongInt; items: GxTagArray); C;
  395. PROCEDURE GXSetStyleTags(target: GxStyle; tagType, index, oldCount, newCount: LongInt; items: GxTagArray); C;
  396. PROCEDURE GXSetTransformTags(target: GxTransform; tagType, index, oldCount, newCount: LongInt; items: GxTagArray); C;
  397. PROCEDURE GXSetViewDeviceTags(target: GxViewDevice; tagType, index, oldCount, newCount: LongInt; items: GxTagArray); C;
  398. PROCEDURE GXSetViewPortTags(target: GxViewPort; tagType, index, oldCount, newCount: LongInt; items: GxTagArray); C;
  399.  
  400. FUNCTION GXGetInkAttributes(source: GxInk): GxInkAttribute; C;
  401. FUNCTION GXGetShapeAttributes(source: GxShape): GxShapeAttribute; C;
  402. FUNCTION GXGetShapeInkAttributes(source: GxShape): GxInkAttribute; C;
  403. FUNCTION GXGetShapeStyleAttributes(source: GxShape): GxStyleAttribute; C;
  404. FUNCTION GXGetStyleAttributes(source: GxStyle): GxStyleAttribute; C;
  405. FUNCTION GXGetShapeTextAttributes(source: GxShape): GxTextAttribute; C;
  406. FUNCTION GXGetStyleTextAttributes(source: GxStyle): GxTextAttribute; C;
  407. FUNCTION GXGetViewDeviceAttributes(source: GxViewDevice): GxDeviceAttribute; C;
  408. FUNCTION GXGetViewPortAttributes(source: GxViewPort): GxPortAttribute; C;
  409.  
  410. PROCEDURE GXSetInkAttributes(target: GxInk; attributes: GxInkAttribute); C;
  411. PROCEDURE GXSetShapeAttributes(target: GxShape; attributes: GxShapeAttribute); C;
  412. PROCEDURE GXSetShapeInkAttributes(target: GxShape; attributes: GxInkAttribute); C;
  413. PROCEDURE GXSetShapeStyleAttributes(target: GxShape; attributes: GxStyleAttribute); C;
  414. PROCEDURE GXSetStyleAttributes(target: GxStyle; attributes: GxStyleAttribute); C;
  415. PROCEDURE GXSetShapeTextAttributes(target: GxShape; attributes: GxTextAttribute); C;
  416. PROCEDURE GXSetStyleTextAttributes(target: GxStyle; attributes: GxTextAttribute); C;
  417. PROCEDURE GXSetViewDeviceAttributes(target: GxViewDevice; attributes: GxDeviceAttribute); C;
  418. PROCEDURE GXSetViewPortAttributes(target: GxViewPort; attributes: GxPortAttribute); C;
  419.  
  420. FUNCTION GXGetColorProfileOwners(source: GxColorProfile): LongInt; C;
  421. FUNCTION GXGetColorSetOwners(source: GxColorSet): LongInt; C;
  422. FUNCTION GXGetInkOwners(source: GxInk): LongInt; C;
  423. FUNCTION GXGetShapeOwners(source: GxShape): LongInt; C;
  424. FUNCTION GXGetStyleOwners(source: GxStyle): LongInt; C;
  425. FUNCTION GXGetTagOwners(source: GxTag): LongInt; C;
  426. FUNCTION GXGetTransformOwners(source: GxTransform): LongInt; C;
  427.  
  428. PROCEDURE GXLockShape(target: GxShape); C;
  429. PROCEDURE GXLockTag(target: GxTag); C;
  430. PROCEDURE GXUnlockShape(target: GxShape); C;
  431. PROCEDURE GXUnlockTag(target: GxTag); C;
  432. FUNCTION GXGetShapeStructure(source: GxShape; VAR length: LongInt): Ptr; C;
  433. FUNCTION GXGetTagStructure(source: GxTag; VAR length: LongInt): Ptr; C;
  434.  
  435. FUNCTION GXGetColorDistance(target, source: GxColorPointer): Fixed; C;
  436. FUNCTION GXShapeLengthToPoint(target: GxShape; index: LongInt; length: Fixed; VAR location, tangent: GxPoint): GxPointPointer; C;
  437.  
  438. FUNCTION GXGetShapeArea(source: GxShape; index: LongInt; VAR area: GxWide): GxWidePointer; C;
  439. FUNCTION GXGetShapeCacheSize(source: GxShape): LongInt; C;
  440. FUNCTION GXGetShapeCenter(source: GxShape; index: LongInt; VAR center: GxPoint): GxPointPointer; C;
  441. FUNCTION GXGetShapeDirection(source: GxShape; contour: LongInt): GxContourDirection; C;
  442. FUNCTION GXGetShapeIndex(source: GxShape; contour, vector: LongInt): LongInt; C;
  443. FUNCTION GXGetShapeLength(source: GxShape; index: LongInt; VAR length: GxWide): GxWidePointer; C;
  444. FUNCTION GXGetShapeSize(source: GxShape): LongInt; C;
  445.  
  446. FUNCTION GXCountShapeContours(source: GxShape): LongInt; C;
  447. FUNCTION GXCountShapePoints(source: GxShape; contour: LongInt): LongInt; C;
  448.  
  449. FUNCTION GXGetShapeDashPositions(source: GxShape; VAR dashMappings: GxMapping): LongInt; C;    { returns the number of positions }
  450. FUNCTION GXGetShapeDeviceArea(source: GxShape; port: GxViewPort; device: GxViewDevice): LongInt; C;
  451. FUNCTION GXGetShapeDeviceBounds(source: GxShape; port: GxViewPort; device: GxViewDevice; VAR bounds: GxRectangle): Boolean; C;
  452. FUNCTION GXGetShapeDeviceColors(source: GxShape; port: GxViewPort; device: GxViewDevice; VAR width: LongInt): GxColorSet; C;
  453. FUNCTION GXGetShapeGlobalBounds(source: GxShape; port: GxViewPort; group: GxViewGroup; VAR bounds: GxRectangle): Boolean; C;
  454. FUNCTION GXGetShapeGlobalViewDevices(source: GxShape; port: GxViewPort; VAR list: GxViewDevice): LongInt; C;
  455. FUNCTION GXGetShapeGlobalViewPorts(source: GxShape; VAR list: GxViewPort): LongInt; C;
  456. FUNCTION GXGetShapeLocalBounds(source: GxShape; VAR bounds: GxRectangle): GxRectanglePointer; C;
  457. FUNCTION GXGetShapePatternPositions(source: GxShape; VAR positions: GxPoint): LongInt; C;    { returns the number of positions }
  458. PROCEDURE GXGetShapeLocalFontMetrics(sourceShape: GxShape; VAR before, after, caretAngle, caretOffset: GxPoint); C;
  459. PROCEDURE GXGetShapeDeviceFontMetrics(sourceShape: GxShape; port: GxViewPort; device: GxViewDevice;
  460.         VAR before, after, caretAngle, caretOffset: GxPoint); C;
  461.  
  462. FUNCTION GXGetViewGroupViewDevices(source: GxViewGroup; VAR list: GxViewDevice): LongInt; C;
  463. FUNCTION GXGetViewGroupViewPorts(source: GxViewGroup; VAR list: GxViewPort): LongInt; C;
  464.  
  465. FUNCTION GXGetViewPortGlobalMapping(source: GxViewPort; VAR map: GxMapping): GxMappingPointer; C;
  466. FUNCTION GXGetViewPortViewDevices(source: GxViewPort; VAR list: GxViewDevice): LongInt; C;
  467.  
  468. FUNCTION GXHitTestPicture(target: GxShape; test: GxPointPointer; VAR result: GxHitTestInfo; level, depth: LongInt): GxShape; C;
  469.  
  470. FUNCTION GXIntersectRectangle(VAR target: GxRectangle; source, operand: GxRectanglePointer): Boolean; C;
  471. FUNCTION GXUnionRectangle(VAR target: GxRectangle; source, operand: GxRectanglePointer): GxRectanglePointer; C;
  472.  
  473. FUNCTION GXTouchesRectanglePoint(target: GxRectanglePointer; test: GxPointPointer): Boolean; C;
  474. FUNCTION GXTouchesShape(target, test: GxShape): Boolean; C;
  475. FUNCTION GXTouchesBoundsShape(target: GxRectanglePointer; test: GxShape): Boolean; C;
  476.  
  477. FUNCTION GXContainsRectangle(container, test: GxRectanglePointer): Boolean; C;
  478. FUNCTION GXContainsShape(container, test: GxShape): Boolean; C;
  479. FUNCTION GXContainsBoundsShape(container: GxRectanglePointer; test: GxShape; index: LongInt): Boolean; C;
  480.  
  481. FUNCTION GXConvertColor(VAR target: GxColor; space: GxColorSpace; aSet: GxColorSet; profile: GxColorProfile): GxColorPointer; C;
  482. FUNCTION GXCombineColor(VAR target: GxColor; operand: GxInk): GxColorPointer; C;
  483.  
  484. FUNCTION GXCheckColor(source: GxColorPointer; space: GxColorSpace; aSet: GxColorSet; profile: GxColorProfile): Boolean; C;
  485. FUNCTION GXCheckBitmapColor(source: GxShape; area: GxLongRectanglePointer; space: GxColorSpace;
  486.         aSet: GxColorSet; profile: GxColorProfile): GxShape; C;
  487.  
  488. FUNCTION GXGetHalftoneDeviceAngle(source: GxViewDevice; data: GxHalftonePointer): Fixed; C;
  489.  
  490. FUNCTION GXGetColorSetParts(source: GxColorSet; index, count: LongInt; VAR space: GxColorSpace; VAR data: GxSetColor): LongInt; C;
  491. FUNCTION GXGetGlyphParts(source: GxShape; index, charCount: LongInt; VAR byteLength: LongInt; VAR text: Byte;
  492.         VAR positions: GxPoint; VAR advanceBits: LongInt; VAR tangents: GxPoint; VAR runCount: LongInt;
  493.         VAR styleRuns: Integer; VAR styles: GxStyle): LongInt; C;    { returns the glyph count }
  494. FUNCTION GXGetPathParts(source: GxShape; index, count: LongInt; VAR data: GxPaths): LongInt; C;
  495. FUNCTION GXGetPictureParts(source: GxShape; index, count: LongInt; VAR shapes: GxShape; VAR styles: GxStyle;
  496.         VAR inks: GxInk; VAR transforms: GxTransform): LongInt; C;
  497. FUNCTION GXGetPolygonParts(source: GxShape; index, count: LongInt; VAR data: GxPolygons): LongInt; C;
  498. FUNCTION GXGetShapeParts(source: GxShape; index, count: LongInt; destination: GxShape): GxShape; C;
  499. FUNCTION GXGetTextParts(source: GxShape; index, charCount: LongInt; VAR text: Byte): LongInt; C;
  500.  
  501. PROCEDURE GXSetColorSetParts(target: GxColorSet; index, oldCount, newCount: LongInt; data: GxSetColorArray); C;
  502. PROCEDURE GXSetGlyphParts(source: GxShape; index, oldCharCount, newCharCount: LongInt; text: ByteArray; positions: GxPointArray;
  503.         advanceBits: LongIntArray; tangents: GxPointArray; styleRuns: IntegerArray; styles: GxStyleArray); C;
  504. PROCEDURE GXSetPathParts(target: GxShape; index, count: LongInt; data: GxPathsPointer; flags: GxEditShapeFlag); C;
  505. PROCEDURE GXSetPictureParts(target: GxShape; index, oldCount, newCount: LongInt; shapes: GxShapeArray;
  506.         styles: GxStyleArray; inks: GxInkArray; transforms: GxTransformArray); C;
  507. PROCEDURE GXSetPolygonParts(target: GxShape; index, count: LongInt; data: GxPolygonsPointer; flags: GxEditShapeFlag); C;
  508. PROCEDURE GXSetShapeParts(target: GxShape; index, count: LongInt; insert: GxShape; flags: GxEditShapeFlag); C;
  509. PROCEDURE GXSetTextParts(target: GxShape; index, oldCharCount, newCharCount: LongInt; text: ByteArray); C;
  510.  
  511. FUNCTION GXGetShapePoints(source: GxShape; index, count: LongInt; VAR data: GxPoint): LongInt; C;
  512. PROCEDURE GXSetShapePoints(target: GxShape; index, count: LongInt; data: GxPointArray); C;
  513.  
  514. FUNCTION GXGetGlyphPositions(source: GxShape; index, charCount: LongInt; VAR advance: LongInt; VAR positions: GxPoint): LongInt; C;
  515. FUNCTION GXGetGlyphTangents(source: GxShape; index, charCount: LongInt; VAR tangents: GxPoint): LongInt; C;
  516. PROCEDURE GXSetGlyphPositions(target: GxShape; index, charCount: LongInt; advance: LongIntArray; positions: GxPointArray); C;
  517. PROCEDURE GXSetGlyphTangents(target: GxShape; index, charCount: LongInt; tangents: GxPointArray); C;
  518.  
  519. FUNCTION GXGetGlyphMetrics(source: GxShape; VAR advances: GxPoint; VAR boundingBoxes: GxRectangle; VAR sideBearings: GxPoint): LongInt; C;
  520.  
  521. PROCEDURE GXDifferenceShape(target, operand: GxShape); C;
  522. PROCEDURE GXExcludeShape(target, operand: GxShape); C;
  523. PROCEDURE GXIntersectShape(target, operand: GxShape); C;
  524. PROCEDURE GXMapShape(target: GxShape; map: GxMappingPointer); C;
  525. PROCEDURE GXMoveShape(target: GxShape; deltaX, deltaY: Fixed); C;
  526. PROCEDURE GXMoveShapeTo(target: GxShape; x, y: Fixed); C;
  527. PROCEDURE GXReverseDifferenceShape(target, operand: GxShape); C;
  528. PROCEDURE GXRotateShape(target: GxShape; degrees, xOffset, yOffset: Fixed); C;
  529. PROCEDURE GXScaleShape(target: GxShape; hScale, vScale, xOffset, yOffset: Fixed); C;
  530. PROCEDURE GXSkewShape(target: GxShape; xSkew, ySkew, xOffset, yOffset: Fixed); C;
  531. PROCEDURE GXUnionShape(target, operand: GxShape); C;
  532.  
  533. PROCEDURE GXDifferenceTransform(target: GxTransform; operand: GxShape); C;
  534. PROCEDURE GXExcludeTransform(target: GxTransform; operand: GxShape); C;
  535. PROCEDURE GXIntersectTransform(target: GxTransform; operand: GxShape); C;
  536. PROCEDURE GXMapTransform(target: GxTransform; map: GxMappingPointer); C;
  537. PROCEDURE GXMoveTransform(target: GxTransform; deltaX, deltaY: Fixed); C;
  538. PROCEDURE GXMoveTransformTo(target: GxTransform; x, y: Fixed); C;
  539. PROCEDURE GXReverseDifferenceTransform(target: GxTransform; operand: GxShape); C;
  540. PROCEDURE GXRotateTransform(target: GxTransform; degrees, xOffset, yOffset: Fixed); C;
  541. PROCEDURE GXScaleTransform(target: GxTransform; hScale, vScale, xOffset, yOffset: Fixed); C;
  542. PROCEDURE GXSkewTransform(target: GxTransform; xSkew, ySkew, xOffset, yOffset: Fixed); C;
  543. PROCEDURE GXUnionTransform(target: GxTransform; operand: GxShape); C;
  544.  
  545. PROCEDURE GXBreakShape(target: GxShape; index: LongInt); C;
  546. PROCEDURE GXChangedShape(target: GxShape); C;
  547. FUNCTION GXHitTestShape(target: GxShape; test: GxPointPointer; VAR result: GxHitTestInfo): GxShapePart; C;
  548. FUNCTION GXHitTestDevice(target: GxShape; port: GxViewPort; device: GxViewDevice; test, tolerance: GxPointPointer): GxShape; C;
  549. PROCEDURE GXInsetShape(target: GxShape; inset: Fixed); C;
  550. PROCEDURE GXInvertShape(target: GxShape); C;
  551. PROCEDURE GXPrimitiveShape(target: GxShape); C;
  552. PROCEDURE GXReduceShape(target: GxShape; contour: LongInt); C;
  553. PROCEDURE GXReverseShape(target: GxShape; contour: LongInt); C;
  554. PROCEDURE GXSimplifyShape(target: GxShape); C;
  555.  
  556. PROCEDURE GXLockColorProfile(source: gxColorProfile); C;
  557. PROCEDURE GXUnlockColorProfile(source: gxColorProfile); C;
  558. FUNCTION GXGetColorProfileStructure(source: gxColorProfile; VAR length: LongInt) : Ptr; C;
  559.  
  560. PROCEDURE GXFlattenShape(source: GxShape; flags: GxFlattenFlag; VAR block: GxSpoolBlock); C;
  561. FUNCTION GXUnflattenShape(VAR block: GxSpoolBlock; count: LongInt; portList: GxViewPortArray): GxShape; C;
  562.  
  563.  
  564. {$ENDC}
  565.  
  566. {$IFC NOT UsingIncludes}
  567.     END.
  568. {$ENDC}
  569.